home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d13
/
powertip.arc
/
INSTALL.BAT
next >
Wrap
DOS Batch File
|
1991-07-10
|
3KB
|
79 lines
echo off
cls
echo.
echo ┌─────────────────────────────────────────────────────────────────────────────┐
echo │ Best of Star─Dot─Star (*.*) Vol 1 │
echo │ │
echo │ Disk Installation Program │
echo │ │
echo │ Copyright 1988 by PCW Communications, Inc. All rights reserved. │
echo └─────────────────────────────────────────────────────────────────────────────┘
echo.
echo.
REM ----- Check first parameter
for %%d in (A: B: C: D: E: F: G: H: I: J: K: L: M: N: O: P: Q: R: S: T: U: V: W: X: Y: Z:) do if %%d==%1 goto goodarg1
for %%d in (a: b: c: d: e: f: g: h: i: j: k: l: m: n: o: p: q: r: s: t: u: v: w: x: y: z:) do if %%d==%1 goto goodarg1
goto badargs
:goodarg1
REM ----- Check second parameter
for %%d in (A: B: C: D: E: F: G: H: I: J: K: L: M: N: O: P: Q: R: S: T: U: V: W: X: Y: Z:) do if %%d==%2 goto goodarg2
for %%d in (a: b: c: d: e: f: g: h: i: j: k: l: m: n: o: p: q: r: s: t: u: v: w: x: y: z:) do if %%d==%2 goto goodarg2
goto badargs
:goodarg2
REM ----- Reject equal drives
if %1==%2 goto badargs
REM ----- Reject source if star.exe is not there
if not exist %1star.exe goto badargs
REM ----- Switch to destination drive
%2
REM ----- Check if this is an update to an old STAR1 directory
if exist ..\STAR1\star.exe goto start
REM ----- Create and/or change to new STAR1 directory
if not exist STAR1\star.exe md STAR1
cd STAR1
:start
REM ----- Give user a chance to cancel, then install files
echo Installing %1*.* to %2
echo.
pause
echo.
echo Installation in progress. Please wait...
copy %1*.* >nul
if not exist _WP\readme md _WP >nul
if not exist _WS\readme md _WS >nul
if not exist _TURBO\readme md _TURBO >nul
if not exist _BATCH\readme md _BATCH >nul
if not exist _BASIC\readme md _BASIC >nul
if not exist _C\readme md _C >nul
if not exist _dBASE\readme md _dBASE >nul
if not exist _123\readme md _123 >nul
if not exist _PARADOX\readme md _PARADOX >nul
if not exist _DOS\readme md _DOS >nul
copy %1\_WP\*.* %2_WP >nul
copy %1\_WS\*.* %2_WS >nul
copy %1\_TURBO\*.* %2_TURBO >nul
copy %1\_BATCH\*.* %2_BATCH >nul
copy %1\_BASIC\*.* %2_BASIC >nul
copy %1\_C\*.* %2_C >nul
copy %1\_dBASE\*.* %2_dBASE >nul
copy %1\_123\*.* %2_123 >nul
copy %1\_PARADOX\*.* %2_PARADOX >nul
copy %1\_DOS\*.* %2_DOS >nul
star
goto end
:badargs
echo INSTALL.BAT requires source and destination drive letters.
echo Try running the program again with a command such as:
echo.
echo a:install a: c:
echo.
echo where a: is the source drive holding the diskette and c: is
echo the destination drive to which you want to copy files. The
echo source and destination drives must be different. INSTALL.BAT
echo will copy all files and directories from the source diskette
echo to a new directory named STAR1 on the destination drive.
echo.
echo.
echo.
:end